home *** CD-ROM | disk | FTP | other *** search
/ PD ROM 1 / PD ROM Volume I - Macintosh Software from BMUG (1988).iso / Stacks / Hyper Utilities / Text Utilities / Make Letter Button / card_2950.txt < prev    next >
Encoding:
Text File  |  1988-04-23  |  2.9 KB  |  107 lines
  1. -- card: 2950 from stack: in
  2. -- bmap block id: 3301
  3. -- flags: 0000
  4. -- background id: 2768
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 8000
  11. -- rect: left=207 top=23 right=77 bottom=265
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 1004 / 1004
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Make letter
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   open file "Letter Transfer"-- this creates the file you will be trans-
  23.   --ferring to your word processor
  24.   write "My Name" & return to file "Letter Transfer"--replace "My Name"
  25.   --with your name
  26.   write "My Address" & return to file "Letter Transfer"-- etc.
  27.   write "My City, State Zip" & return to file "Letter Transfer"
  28.   write "My Phone Number" & return & return to file "Letter Transfer"
  29.   write the long date & return to file "Letter Transfer"
  30.   write line 1 of field "Name and Address" & return
  31.   to file "Letter Transfer"
  32.   write line 2 of field "Name and Address" & return
  33.   to file "Letter Transfer"
  34.   write line 3 of field "Name and Address" & return
  35.   to file "Letter Transfer"
  36.   write line 4 of field "Name and Address" & return & return
  37.   to file "Letter Transfer"
  38.   write "Dear" to file "Letter Transfer"
  39.   Close file "Letter Transfer"
  40.   Open ":HyperCard:Letter Transfer" with "Microsoft Word"-- use the name
  41.   --of your word processing program here
  42. end mouseUp
  43.  
  44.  
  45.  
  46.  
  47.  
  48. -- part 2 (field)
  49. -- low flags: 00
  50. -- high flags: 0004
  51. -- rect: left=29 top=77 right=107 bottom=472
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 0 / 0
  54. -- text alignment: 1
  55. -- font id: 2
  56. -- text size: 20
  57. -- style flags: 0
  58. -- line height: 26
  59. -- part name: Title
  60.  
  61.  
  62. -- part 3 (field)
  63. -- low flags: 00
  64. -- high flags: 0000
  65. -- rect: left=28 top=113 right=277 bottom=473
  66. -- title width / last selected line: 0
  67. -- icon id / first selected line: 0 / 0
  68. -- text alignment: 0
  69. -- font id: 2
  70. -- text size: 12
  71. -- style flags: 0
  72. -- line height: 16
  73. -- part name: Text
  74.  
  75.  
  76. -- part 4 (field)
  77. -- low flags: 00
  78. -- high flags: 0000
  79. -- rect: left=100 top=279 right=333 bottom=412
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 0 / 0
  82. -- text alignment: 1
  83. -- font id: 2
  84. -- text size: 12
  85. -- style flags: 0
  86. -- line height: 16
  87. -- part name: My Name
  88.  
  89.  
  90. -- part contents for card part 2
  91. ----- text -----
  92. "Make Letter" Button
  93.  
  94. -- part contents for card part 3
  95. ----- text -----
  96. This button, if pasted into your Address stack and modified properly, will open your word processing program to a document that has your name and address, the date, the recipient's name and address, and the words "Dear" already printed at the top.  
  97.  
  98. You need a hard disk to make it work properly, and you must modify the script to make it fit your name and address and also to make it open your particular word processing program.
  99.  
  100. Let me know if you like it!
  101.  
  102.  
  103. -- part contents for card part 4
  104. ----- text -----
  105. Dan Simonson
  106. #71131,3044
  107.